home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus Special 13 / AMIGAplus Sonderheft 13 (1998)(ICP)(DE)[!].iso / rexx / opendrw.m2i < prev    next >
Text File  |  1997-11-18  |  243b  |  22 lines
  1. /*
  2.    OpenDraw (Drawer)
  3.  
  4.    Open a drawer
  5.    Usefull to open a drawer with an Hotkey
  6.  
  7. */
  8.  
  9. PARSE ARG Drawer
  10. OPTIONS RESULTS
  11. ADDRESS "M2IPort.Rexx"
  12.  
  13. GET WINDOW Drawer
  14. IF RESULT=1 THEN
  15.  DO
  16.    CLOSEDRW Drawer
  17.  END
  18.  ELSE DO
  19.    OPENDRW Drawer
  20.  END
  21.  
  22.